home *** CD-ROM | disk | FTP | other *** search
/ QRZ! Ham Radio 8 / QRZ Ham Radio Callsign Database - Volume 8.iso / pc / files / mac / mac525.hqx / JC 525B1.1 / Mac525ß1.1 / background_2719.xml next >
Extensible Markup Language  |  1994-09-03  |  48KB  |  1,146 lines

  1. <?xml version="1.0" encoding="utf-8" ?>
  2. <!DOCTYPE background PUBLIC "-//Apple, Inc.//DTD background V 2.0//EN" "" >
  3. <background>
  4.     <id>2719</id>
  5.     <filler1>0</filler1>
  6.     <bitmap>BMAP_2251.pbm</bitmap>
  7.     <cantDelete> <false /> </cantDelete>
  8.     <showPict> <true /> </showPict>
  9.     <dontSearch> <false /> </dontSearch>
  10.     <link rel="stylesheet" type="text/css" href="stylesheet_3131.css" />
  11.     <part>
  12.         <id>1</id>
  13.         <type>button</type>
  14.         <visible> <true /> </visible>
  15.         <reserved5> 0 </reserved5>
  16.         <reserved4> 0 </reserved4>
  17.         <reserved3> 0 </reserved3>
  18.         <reserved2> 0 </reserved2>
  19.         <reserved1> 0 </reserved1>
  20.         <enabled> <true /> </enabled>
  21.         <rect>
  22.             <left>171</left>
  23.             <top>170</top>
  24.             <right>211</right>
  25.             <bottom>204</bottom>
  26.         </rect>
  27.         <style>transparent</style>
  28.         <showName> <false /> </showName>
  29.         <highlight> <false /> </highlight>
  30.         <autoHighlight> <true /> </autoHighlight>
  31.         <sharedHighlight> <true /> </sharedHighlight>
  32.         <family>0</family>
  33.         <titleWidth>0</titleWidth>
  34.         <icon>31344</icon>
  35.         <textAlign>center</textAlign>
  36.         <font>Chicago</font>
  37.         <textSize>12</textSize>
  38.         <textStyle>plain</textStyle>
  39.         <name>DOWN</name>
  40.         <script>on mouseDownglobal step, onLineput empty into bg field "Mem Recall"if online thenwait 10put bg field "step" into step-- if bg field "dial" < 500 then put 1 into step1-- elseput step into step1repeat while the mouse is downsendFreq -- see stack script for detailsset numberFormat to "#####.00"subtract step1 from bg field "dial"wait 10end repeatelse exit mousedownend mouseDown-- on mouseUp-- global onLine-- if online then-- sendFreq -- see stack script for details-- else exit mouseUpend mouseUpon mouseUpglobal step, onLineif online thenif bg field "dial" < 500 then put 1 into step1else put step into step1set numberFormat to "#####.00"subtract step1 from bg field "dial"sendFreq -- see stack script for detailselse exit mouseUpend mouseUp</script>
  41.     </part>
  42.     <part>
  43.         <id>3</id>
  44.         <type>field</type>
  45.         <visible> <true /> </visible>
  46.         <dontWrap> <false /> </dontWrap>
  47.         <dontSearch> <false /> </dontSearch>
  48.         <sharedText> <false /> </sharedText>
  49.         <fixedLineHeight> <true /> </fixedLineHeight>
  50.         <autoTab> <false /> </autoTab>
  51.         <lockText> <true /> </lockText>
  52.         <rect>
  53.             <left>185</left>
  54.             <top>38</top>
  55.             <right>326</right>
  56.             <bottom>65</bottom>
  57.         </rect>
  58.         <style>transparent</style>
  59.         <autoSelect> <false /> </autoSelect>
  60.         <showLines> <false /> </showLines>
  61.         <wideMargins> <false /> </wideMargins>
  62.         <multipleLines> <false /> </multipleLines>
  63.         <reservedFamily> 0 </reservedFamily>
  64.         <titleWidth>0</titleWidth>
  65.         <icon>0</icon>
  66.         <textAlign>right</textAlign>
  67.         <font>Monaco</font>
  68.         <textSize>24</textSize>
  69.         <textStyle>outline</textStyle>
  70.         <textHeight>32</textHeight>
  71.         <name>Dial</name>
  72.         <script></script>
  73.     </part>
  74.     <part>
  75.         <id>4</id>
  76.         <type>field</type>
  77.         <visible> <true /> </visible>
  78.         <dontWrap> <false /> </dontWrap>
  79.         <dontSearch> <false /> </dontSearch>
  80.         <sharedText> <false /> </sharedText>
  81.         <fixedLineHeight> <true /> </fixedLineHeight>
  82.         <autoTab> <false /> </autoTab>
  83.         <lockText> <true /> </lockText>
  84.         <rect>
  85.             <left>105</left>
  86.             <top>70</top>
  87.             <right>187</right>
  88.             <bottom>88</bottom>
  89.         </rect>
  90.         <style>transparent</style>
  91.         <autoSelect> <false /> </autoSelect>
  92.         <showLines> <false /> </showLines>
  93.         <wideMargins> <false /> </wideMargins>
  94.         <multipleLines> <false /> </multipleLines>
  95.         <reservedFamily> 0 </reservedFamily>
  96.         <titleWidth>0</titleWidth>
  97.         <icon>0</icon>
  98.         <textAlign>left</textAlign>
  99.         <font>Geneva</font>
  100.         <textSize>12</textSize>
  101.         <textStyle>outline</textStyle>
  102.         <textHeight>16</textHeight>
  103.         <name>MODE</name>
  104.         <script></script>
  105.     </part>
  106.     <part>
  107.         <id>2</id>
  108.         <type>button</type>
  109.         <visible> <true /> </visible>
  110.         <reserved5> 0 </reserved5>
  111.         <reserved4> 0 </reserved4>
  112.         <reserved3> 0 </reserved3>
  113.         <reserved2> 0 </reserved2>
  114.         <reserved1> 0 </reserved1>
  115.         <enabled> <true /> </enabled>
  116.         <rect>
  117.             <left>302</left>
  118.             <top>171</top>
  119.             <right>342</right>
  120.             <bottom>205</bottom>
  121.         </rect>
  122.         <style>transparent</style>
  123.         <showName> <false /> </showName>
  124.         <highlight> <false /> </highlight>
  125.         <autoHighlight> <true /> </autoHighlight>
  126.         <sharedHighlight> <true /> </sharedHighlight>
  127.         <family>0</family>
  128.         <titleWidth>0</titleWidth>
  129.         <icon>29627</icon>
  130.         <textAlign>center</textAlign>
  131.         <font>Chicago</font>
  132.         <textSize>12</textSize>
  133.         <textStyle>plain</textStyle>
  134.         <name>UP</name>
  135.         <script>on mouseDownglobal step, onlineif online thenwait 10put empty into bg field "Mem Recall"put bg field "step" into stepput step into step1repeat while the mouse is downsendFreq -- see stack script for detailsset numberFormat to "#####.00"add step1 to bg field "dial"wait 10end repeatelse exit mousedownend mouseDownon mouseUpglobal step, onlineif online thenif bg field "dial" < 500 then put 1 into step1else put step into step1set numberFormat to "#####.00"add step1 to bg field "dial"sendFreq -- see stack script for detailselse exit mouseUpend mouseUp</script>
  136.     </part>
  137.     <part>
  138.         <id>5</id>
  139.         <type>field</type>
  140.         <visible> <true /> </visible>
  141.         <dontWrap> <false /> </dontWrap>
  142.         <dontSearch> <false /> </dontSearch>
  143.         <sharedText> <false /> </sharedText>
  144.         <fixedLineHeight> <true /> </fixedLineHeight>
  145.         <autoTab> <false /> </autoTab>
  146.         <lockText> <true /> </lockText>
  147.         <rect>
  148.             <left>261</left>
  149.             <top>70</top>
  150.             <right>313</right>
  151.             <bottom>88</bottom>
  152.         </rect>
  153.         <style>transparent</style>
  154.         <autoSelect> <false /> </autoSelect>
  155.         <showLines> <false /> </showLines>
  156.         <wideMargins> <false /> </wideMargins>
  157.         <multipleLines> <false /> </multipleLines>
  158.         <reservedFamily> 0 </reservedFamily>
  159.         <titleWidth>0</titleWidth>
  160.         <icon>0</icon>
  161.         <textAlign>left</textAlign>
  162.         <font>Geneva</font>
  163.         <textSize>12</textSize>
  164.         <textStyle>outline</textStyle>
  165.         <textHeight>16</textHeight>
  166.         <name>AGC</name>
  167.         <script></script>
  168.     </part>
  169.     <part>
  170.         <id>6</id>
  171.         <type>field</type>
  172.         <visible> <true /> </visible>
  173.         <dontWrap> <false /> </dontWrap>
  174.         <dontSearch> <false /> </dontSearch>
  175.         <sharedText> <false /> </sharedText>
  176.         <fixedLineHeight> <true /> </fixedLineHeight>
  177.         <autoTab> <false /> </autoTab>
  178.         <lockText> <true /> </lockText>
  179.         <rect>
  180.             <left>391</left>
  181.             <top>70</top>
  182.             <right>436</right>
  183.             <bottom>92</bottom>
  184.         </rect>
  185.         <style>transparent</style>
  186.         <autoSelect> <false /> </autoSelect>
  187.         <showLines> <false /> </showLines>
  188.         <wideMargins> <false /> </wideMargins>
  189.         <multipleLines> <false /> </multipleLines>
  190.         <reservedFamily> 0 </reservedFamily>
  191.         <titleWidth>0</titleWidth>
  192.         <icon>0</icon>
  193.         <textAlign>left</textAlign>
  194.         <font>Geneva</font>
  195.         <textSize>12</textSize>
  196.         <textStyle>outline</textStyle>
  197.         <textHeight>16</textHeight>
  198.         <name>CHANNEL</name>
  199.         <script></script>
  200.     </part>
  201.     <part>
  202.         <id>7</id>
  203.         <type>field</type>
  204.         <visible> <true /> </visible>
  205.         <dontWrap> <false /> </dontWrap>
  206.         <dontSearch> <false /> </dontSearch>
  207.         <sharedText> <false /> </sharedText>
  208.         <fixedLineHeight> <true /> </fixedLineHeight>
  209.         <autoTab> <false /> </autoTab>
  210.         <lockText> <true /> </lockText>
  211.         <rect>
  212.             <left>134</left>
  213.             <top>89</top>
  214.             <right>184</right>
  215.             <bottom>108</bottom>
  216.         </rect>
  217.         <style>transparent</style>
  218.         <autoSelect> <false /> </autoSelect>
  219.         <showLines> <false /> </showLines>
  220.         <wideMargins> <false /> </wideMargins>
  221.         <multipleLines> <false /> </multipleLines>
  222.         <reservedFamily> 0 </reservedFamily>
  223.         <titleWidth>0</titleWidth>
  224.         <icon>0</icon>
  225.         <textAlign>left</textAlign>
  226.         <font>Geneva</font>
  227.         <textSize>12</textSize>
  228.         <textStyle>outline</textStyle>
  229.         <textHeight>16</textHeight>
  230.         <name>Filter</name>
  231.         <script></script>
  232.     </part>
  233.     <part>
  234.         <id>8</id>
  235.         <type>field</type>
  236.         <visible> <true /> </visible>
  237.         <dontWrap> <false /> </dontWrap>
  238.         <dontSearch> <false /> </dontSearch>
  239.         <sharedText> <false /> </sharedText>
  240.         <fixedLineHeight> <true /> </fixedLineHeight>
  241.         <autoTab> <false /> </autoTab>
  242.         <lockText> <true /> </lockText>
  243.         <rect>
  244.             <left>261</left>
  245.             <top>89</top>
  246.             <right>334</right>
  247.             <bottom>107</bottom>
  248.         </rect>
  249.         <style>transparent</style>
  250.         <autoSelect> <false /> </autoSelect>
  251.         <showLines> <false /> </showLines>
  252.         <wideMargins> <false /> </wideMargins>
  253.         <multipleLines> <false /> </multipleLines>
  254.         <reservedFamily> 0 </reservedFamily>
  255.         <titleWidth>0</titleWidth>
  256.         <icon>0</icon>
  257.         <textAlign>left</textAlign>
  258.         <font>Geneva</font>
  259.         <textSize>12</textSize>
  260.         <textStyle>outline</textStyle>
  261.         <textHeight>16</textHeight>
  262.         <name>ATT</name>
  263.         <script></script>
  264.     </part>
  265.     <part>
  266.         <id>9</id>
  267.         <type>field</type>
  268.         <visible> <true /> </visible>
  269.         <dontWrap> <false /> </dontWrap>
  270.         <dontSearch> <false /> </dontSearch>
  271.         <sharedText> <false /> </sharedText>
  272.         <fixedLineHeight> <true /> </fixedLineHeight>
  273.         <autoTab> <false /> </autoTab>
  274.         <lockText> <true /> </lockText>
  275.         <rect>
  276.             <left>392</left>
  277.             <top>89</top>
  278.             <right>436</right>
  279.             <bottom>108</bottom>
  280.         </rect>
  281.         <style>transparent</style>
  282.         <autoSelect> <false /> </autoSelect>
  283.         <showLines> <false /> </showLines>
  284.         <wideMargins> <false /> </wideMargins>
  285.         <multipleLines> <false /> </multipleLines>
  286.         <reservedFamily> 0 </reservedFamily>
  287.         <titleWidth>0</titleWidth>
  288.         <icon>0</icon>
  289.         <textAlign>left</textAlign>
  290.         <font>Geneva</font>
  291.         <textSize>12</textSize>
  292.         <textStyle>outline</textStyle>
  293.         <textHeight>16</textHeight>
  294.         <name>STEP</name>
  295.         <script></script>
  296.     </part>
  297.     <part>
  298.         <id>26</id>
  299.         <type>button</type>
  300.         <visible> <true /> </visible>
  301.         <reserved5> 0 </reserved5>
  302.         <reserved4> 0 </reserved4>
  303.         <reserved3> 0 </reserved3>
  304.         <reserved2> 0 </reserved2>
  305.         <reserved1> 0 </reserved1>
  306.         <enabled> <true /> </enabled>
  307.         <rect>
  308.             <left>364</left>
  309.             <top>164</top>
  310.             <right>454</right>
  311.             <bottom>254</bottom>
  312.         </rect>
  313.         <style>transparent</style>
  314.         <showName> <false /> </showName>
  315.         <highlight> <false /> </highlight>
  316.         <autoHighlight> <true /> </autoHighlight>
  317.         <sharedHighlight> <false /> </sharedHighlight>
  318.         <family>0</family>
  319.         <titleWidth>0</titleWidth>
  320.         <icon>0</icon>
  321.         <textAlign>center</textAlign>
  322.         <font>Chicago</font>
  323.         <textSize>12</textSize>
  324.         <textStyle>plain</textStyle>
  325.         <name>ENTER</name>
  326.         <script>on mouseUpset numberFormat to "#####.00"ask "Please enter frequency in kHz:" with bg field "dial" of cd 1multiply it by 1put it into dialTempif dialTemp > 34000 thenanswer "Sorry, frequency is too high. Maybe you are, too!"pass mouseUpend ifif dialTemp > 0 and dialTemp < 34000 thenput it into bg field "dial" of cd 1sendFreqdoModedoBWdoATTdoAGCend ifend mouseUp</script>
  327.     </part>
  328.     <part>
  329.         <id>29</id>
  330.         <type>button</type>
  331.         <visible> <true /> </visible>
  332.         <reserved5> 0 </reserved5>
  333.         <reserved4> 0 </reserved4>
  334.         <reserved3> 0 </reserved3>
  335.         <reserved2> 0 </reserved2>
  336.         <reserved1> 0 </reserved1>
  337.         <enabled> <true /> </enabled>
  338.         <rect>
  339.             <left>15</left>
  340.             <top>37</top>
  341.             <right>56</right>
  342.             <bottom>65</bottom>
  343.         </rect>
  344.         <style>transparent</style>
  345.         <showName> <false /> </showName>
  346.         <highlight> <false /> </highlight>
  347.         <autoHighlight> <false /> </autoHighlight>
  348.         <sharedHighlight> <true /> </sharedHighlight>
  349.         <family>0</family>
  350.         <titleWidth>0</titleWidth>
  351.         <icon>5436</icon>
  352.         <textAlign>center</textAlign>
  353.         <font>Chicago</font>
  354.         <textSize>12</textSize>
  355.         <textStyle>plain</textStyle>
  356.         <name>New Button</name>
  357.         <script>on mouseUpvisual effect dissolvego card "Mac525 Title Card"wait 5 secondsvisual dissolvego to card id 4022end mouseUp</script>
  358.     </part>
  359.     <part>
  360.         <id>31</id>
  361.         <type>button</type>
  362.         <visible> <true /> </visible>
  363.         <reserved5> 0 </reserved5>
  364.         <reserved4> 0 </reserved4>
  365.         <reserved3> 0 </reserved3>
  366.         <reserved2> 0 </reserved2>
  367.         <reserved1> 0 </reserved1>
  368.         <enabled> <true /> </enabled>
  369.         <rect>
  370.             <left>118</left>
  371.             <top>127</top>
  372.             <right>194</right>
  373.             <bottom>149</bottom>
  374.         </rect>
  375.         <style>shadow</style>
  376.         <showName> <true /> </showName>
  377.         <highlight> <false /> </highlight>
  378.         <autoHighlight> <true /> </autoHighlight>
  379.         <sharedHighlight> <true /> </sharedHighlight>
  380.         <family>0</family>
  381.         <titleWidth>0</titleWidth>
  382.         <icon>0</icon>
  383.         <textAlign>center</textAlign>
  384.         <font>Chicago</font>
  385.         <textSize>12</textSize>
  386.         <textStyle>plain</textStyle>
  387.         <name>B.WIDTH</name>
  388.         <script>on mousedownglobal windowLoc, theTextget the rect of bkgnd btn "B.WIDTH"put item 1 of it + item 1 of loc of card window +1 into horizput item 4 of it + item 2 of loc of card window +64 into vertget PopUpMenu("Wide;Inter;"&┬¼"Narrow;Auxilliary", 19, vert, horiz)put it into choiceif choice = "0" then exit mousedownif choice = "1" then put "WIDE" into bg field FILTER  elseif choice = "2"  then put "INTER" into bg field FILTER elseif choice = "3"  then put "NARR" into bg field FILTER elseif choice = "4" then  put "AUX" into bg field FILTER elseend ifend ifend ifend ifdoBWend mousedown</script>
  389.     </part>
  390.     <part>
  391.         <id>32</id>
  392.         <type>button</type>
  393.         <visible> <true /> </visible>
  394.         <reserved5> 0 </reserved5>
  395.         <reserved4> 0 </reserved4>
  396.         <reserved3> 0 </reserved3>
  397.         <reserved2> 0 </reserved2>
  398.         <reserved1> 0 </reserved1>
  399.         <enabled> <true /> </enabled>
  400.         <rect>
  401.             <left>20</left>
  402.             <top>127</top>
  403.             <right>96</right>
  404.             <bottom>149</bottom>
  405.         </rect>
  406.         <style>shadow</style>
  407.         <showName> <true /> </showName>
  408.         <highlight> <false /> </highlight>
  409.         <autoHighlight> <true /> </autoHighlight>
  410.         <sharedHighlight> <true /> </sharedHighlight>
  411.         <family>0</family>
  412.         <titleWidth>0</titleWidth>
  413.         <icon>0</icon>
  414.         <textAlign>center</textAlign>
  415.         <font>Chicago</font>
  416.         <textSize>12</textSize>
  417.         <textStyle>plain</textStyle>
  418.         <name>MODE</name>
  419.         <script>on mousedownglobal windowLoc, theTextget the rect of bkgnd btn "Mode"put item 1 of it + item 1 of loc of card window +14 into horizput item 4 of it + item 2 of loc of card window +112 into vertget PopUpMenu("AM;USB;LSB;CW;RTTY;FAX;FM", 19, vert, horiz)put it into choiceif choice = "0" then exit mousedownif choice = "1" then put "AM" into bg field "Mode" elseif choice = "2"  then   put "USB" into bg field "Mode" elseif choice = "3"  then put "LSB" into bg field "Mode" elseif choice = "4" then put "CW" into bg field "Mode" elseif choice = "5" then put "RTTY" into bg field "Mode" elseif choice = "6" then put "FAX" into bg field "Mode" elseif choice = "7" then put "FM" into bg field "Mode" elseend ifend ifend ifend ifend ifend ifend ifdoModeend mousedown</script>
  420.     </part>
  421.     <part>
  422.         <id>33</id>
  423.         <type>button</type>
  424.         <visible> <true /> </visible>
  425.         <reserved5> 0 </reserved5>
  426.         <reserved4> 0 </reserved4>
  427.         <reserved3> 0 </reserved3>
  428.         <reserved2> 0 </reserved2>
  429.         <reserved1> 0 </reserved1>
  430.         <enabled> <true /> </enabled>
  431.         <rect>
  432.             <left>414</left>
  433.             <top>127</top>
  434.             <right>490</right>
  435.             <bottom>149</bottom>
  436.         </rect>
  437.         <style>shadow</style>
  438.         <showName> <true /> </showName>
  439.         <highlight> <false /> </highlight>
  440.         <autoHighlight> <true /> </autoHighlight>
  441.         <sharedHighlight> <true /> </sharedHighlight>
  442.         <family>0</family>
  443.         <titleWidth>0</titleWidth>
  444.         <icon>0</icon>
  445.         <textAlign>center</textAlign>
  446.         <font>Chicago</font>
  447.         <textSize>12</textSize>
  448.         <textStyle>plain</textStyle>
  449.         <name>AGC</name>
  450.         <script>on mousedownglobal windowLoc, theTextget the rect of bkgnd btn "AGC"put item 1 of it + item 1 of loc of card window +1 into horizput item 4 of it + item 2 of loc of card window +48 into vertget PopUpMenu("Fast;Slow;Off", 19, vert, horiz)put it into choiceif choice = "0" then exit mousedownif choice = "1" then put "FAST" into bg field "AGC" elseif choice = "2"  then put "SLOW" into bg field "AGC" elseif choice = "3"  then put "OFF" into bg field "AGC" elseend ifend ifend ifdoAGCend mousedown</script>
  451.     </part>
  452.     <part>
  453.         <id>35</id>
  454.         <type>button</type>
  455.         <visible> <true /> </visible>
  456.         <reserved5> 0 </reserved5>
  457.         <reserved4> 0 </reserved4>
  458.         <reserved3> 0 </reserved3>
  459.         <reserved2> 0 </reserved2>
  460.         <reserved1> 0 </reserved1>
  461.         <enabled> <true /> </enabled>
  462.         <rect>
  463.             <left>218</left>
  464.             <top>127</top>
  465.             <right>294</right>
  466.             <bottom>149</bottom>
  467.         </rect>
  468.         <style>shadow</style>
  469.         <showName> <true /> </showName>
  470.         <highlight> <false /> </highlight>
  471.         <autoHighlight> <true /> </autoHighlight>
  472.         <sharedHighlight> <true /> </sharedHighlight>
  473.         <family>0</family>
  474.         <titleWidth>0</titleWidth>
  475.         <icon>0</icon>
  476.         <textAlign>center</textAlign>
  477.         <font>Chicago</font>
  478.         <textSize>12</textSize>
  479.         <textStyle>plain</textStyle>
  480.         <name>STEP</name>
  481.         <script>on mousedownglobal windowLoc, theTextget the rect of bkgnd btn "Step"put item 1 of it + item 1 of loc of card window +1 into horizput item 4 of it + item 2 of loc of card window +128 into vertget PopUpMenu(".01 kHz;.1 kHz;1 kHz;5 kHz;9 kHz;10 kHz;100 kHz;1 MHz ", 19, vert, horiz)put it into choiceif choice = "0" then exit mousedownif choice = "1" then put ".01" into bg field "STEP" elseif choice = "2"  then put ".1" into bg field "STEP" elseif choice = "3"  then put "1" into bg field "STEP" elseif choice = "4"  then put "5" into bg field "STEP" elseif choice = "5"  then put "9" into bg field "STEP" elseif choice = "6"  then put "10" into bg field "STEP" elseif choice = "7"  then put "100" into bg field "STEP" elseif choice = "8"  then put "1000" into bg field "STEP" elseend ifend ifend ifend ifend ifend ifend ifend ifend mousedown</script>
  482.     </part>
  483.     <part>
  484.         <id>36</id>
  485.         <type>button</type>
  486.         <visible> <true /> </visible>
  487.         <reserved5> 0 </reserved5>
  488.         <reserved4> 0 </reserved4>
  489.         <reserved3> 0 </reserved3>
  490.         <reserved2> 0 </reserved2>
  491.         <reserved1> 0 </reserved1>
  492.         <enabled> <true /> </enabled>
  493.         <rect>
  494.             <left>319</left>
  495.             <top>127</top>
  496.             <right>395</right>
  497.             <bottom>149</bottom>
  498.         </rect>
  499.         <style>shadow</style>
  500.         <showName> <true /> </showName>
  501.         <highlight> <false /> </highlight>
  502.         <autoHighlight> <true /> </autoHighlight>
  503.         <sharedHighlight> <true /> </sharedHighlight>
  504.         <family>0</family>
  505.         <titleWidth>0</titleWidth>
  506.         <icon>0</icon>
  507.         <textAlign>center</textAlign>
  508.         <font>Chicago</font>
  509.         <textSize>12</textSize>
  510.         <textStyle>plain</textStyle>
  511.         <name>ATT</name>
  512.         <script>on mousedownglobal windowLoc, theTextget the rect of bkgnd btn "ATT"put item 1 of it + item 1 of loc of card window +1 into horizput item 4 of it + item 2 of loc of card window +32 into vertget PopUpMenu("Off: -0 dB;On: -20 dB", 19, vert, horiz)put it into choiceif choice = "0" then exit mousedownif choice = "1" then put "-0 dB" into bg field "ATT" elseif choice = "2"  then put "-20 dB" into bg field "ATT" elseend ifend ifdoATTend mousedown</script>
  513.     </part>
  514.     <part>
  515.         <id>37</id>
  516.         <type>field</type>
  517.         <visible> <false /> </visible>
  518.         <dontWrap> <false /> </dontWrap>
  519.         <dontSearch> <false /> </dontSearch>
  520.         <sharedText> <false /> </sharedText>
  521.         <fixedLineHeight> <false /> </fixedLineHeight>
  522.         <autoTab> <false /> </autoTab>
  523.         <lockText> <false /> </lockText>
  524.         <rect>
  525.             <left>14</left>
  526.             <top>89</top>
  527.             <right>69</right>
  528.             <bottom>107</bottom>
  529.         </rect>
  530.         <style>transparent</style>
  531.         <autoSelect> <false /> </autoSelect>
  532.         <showLines> <false /> </showLines>
  533.         <wideMargins> <false /> </wideMargins>
  534.         <multipleLines> <false /> </multipleLines>
  535.         <reservedFamily> 0 </reservedFamily>
  536.         <titleWidth>0</titleWidth>
  537.         <icon>0</icon>
  538.         <textAlign>left</textAlign>
  539.         <font>Monaco</font>
  540.         <textSize>9</textSize>
  541.         <textStyle>outline</textStyle>
  542.         <textHeight>12</textHeight>
  543.         <name>Remote</name>
  544.         <script></script>
  545.     </part>
  546.     <part>
  547.         <id>39</id>
  548.         <type>button</type>
  549.         <visible> <true /> </visible>
  550.         <reserved5> 0 </reserved5>
  551.         <reserved4> 0 </reserved4>
  552.         <reserved3> 0 </reserved3>
  553.         <reserved2> 0 </reserved2>
  554.         <reserved1> 0 </reserved1>
  555.         <enabled> <true /> </enabled>
  556.         <rect>
  557.             <left>455</left>
  558.             <top>298</top>
  559.             <right>501</right>
  560.             <bottom>338</bottom>
  561.         </rect>
  562.         <style>rectangle</style>
  563.         <showName> <false /> </showName>
  564.         <highlight> <true /> </highlight>
  565.         <autoHighlight> <false /> </autoHighlight>
  566.         <sharedHighlight> <true /> </sharedHighlight>
  567.         <family>0</family>
  568.         <titleWidth>0</titleWidth>
  569.         <icon>5819</icon>
  570.         <textAlign>center</textAlign>
  571.         <font>Chicago</font>
  572.         <textSize>12</textSize>
  573.         <textStyle>plain</textStyle>
  574.         <name>SWBC</name>
  575.         <script>on mouseUpset icon of me to 5819wait 8set icon of me to 16223wait 8set icon of me to 32013wait 8set icon of me to 17285wait 8set icon of me to 28972WAIT 8set icon of me to 17285WAIT 8set icon of me to 32013WAIT 8set icon of me to 16223WAIT 8set icon of me to 5819closeStackvisual dissolvego homeend mouseUp</script>
  576.     </part>
  577.     <part>
  578.         <id>41</id>
  579.         <type>button</type>
  580.         <visible> <true /> </visible>
  581.         <reserved5> 0 </reserved5>
  582.         <reserved4> 0 </reserved4>
  583.         <reserved3> 0 </reserved3>
  584.         <reserved2> 0 </reserved2>
  585.         <reserved1> 0 </reserved1>
  586.         <enabled> <true /> </enabled>
  587.         <rect>
  588.             <left>58</left>
  589.             <top>298</top>
  590.             <right>133</right>
  591.             <bottom>342</bottom>
  592.         </rect>
  593.         <style>transparent</style>
  594.         <showName> <true /> </showName>
  595.         <highlight> <true /> </highlight>
  596.         <autoHighlight> <false /> </autoHighlight>
  597.         <sharedHighlight> <true /> </sharedHighlight>
  598.         <family>0</family>
  599.         <titleWidth>0</titleWidth>
  600.         <icon>5028</icon>
  601.         <textAlign>center</textAlign>
  602.         <font>Chicago</font>
  603.         <textSize>12</textSize>
  604.         <textStyle>plain</textStyle>
  605.         <name>Edit ChannelΓǪ</name>
  606.         <script>-- This button allows editing of the channel selected with the slideron mouseUpset icon of me to "receiverControl ON"play clickset icon of me to "receiverControl OFF"global Talk--lock screenif Talk then speak "editting chanul " & bg fld "channel"visual effect iris openput bg field "channel" of cd "Main Control Panel" into ChanTempgo to card ("Channel" & ChanTemp)select text of bg field "kHz" of card ("Channel" & ChanTemp)--unlock screenend mouseUp</script>
  607.     </part>
  608.     <part>
  609.         <id>42</id>
  610.         <type>button</type>
  611.         <visible> <true /> </visible>
  612.         <reserved5> 0 </reserved5>
  613.         <reserved4> 0 </reserved4>
  614.         <reserved3> 0 </reserved3>
  615.         <reserved2> 0 </reserved2>
  616.         <reserved1> 0 </reserved1>
  617.         <enabled> <true /> </enabled>
  618.         <rect>
  619.             <left>132</left>
  620.             <top>298</top>
  621.             <right>195</right>
  622.             <bottom>342</bottom>
  623.         </rect>
  624.         <style>transparent</style>
  625.         <showName> <true /> </showName>
  626.         <highlight> <true /> </highlight>
  627.         <autoHighlight> <false /> </autoHighlight>
  628.         <sharedHighlight> <true /> </sharedHighlight>
  629.         <family>0</family>
  630.         <titleWidth>0</titleWidth>
  631.         <icon>5028</icon>
  632.         <textAlign>center</textAlign>
  633.         <font>Chicago</font>
  634.         <textSize>12</textSize>
  635.         <textStyle>plain</textStyle>
  636.         <name>VFO to MEM</name>
  637.         <script>-- This button sets the current parameters into a user-specified-- channel memoryon mouseUpglobal Talkset icon of me to "receiverControl ON"play clickset icon of me to "receiverControl OFF"-- look for first memory channel which is empty & make defaultlock screenpush cardfind "Empty" in bg fld "Station"put bg fld "Channel #" into theDefaultpop cardunlock screenask "Enter memory channel number to set" with theDefaultif It is not empty thenif it < 0 or it >199 thenif Talk thenspeak "Sarry, Chanul number must be 0 to 199"elseanswer "Sorry, channel number must be 0 to 99" with "Ok"end ifexit MouseUpend if-- verify that the channel to be set is emptyset numberFormat to "000"put It * 1 into Tempput "Channel" & Temp into CardNameif bg field "Station" of card CardName is not "Empty" thenanswer "OK to overwrite existing channel" & Temp with "Ok" or "Cancel"if It is "Ok" thenput bg field "Mode" into bg field "Mode" of card CardNameput bg field "Filter" into bg field "Bandwidth" of card CardNameput bg field "Dial" into bg field "kHz" of card CardNameput bg field "AGC" into bg field "AGC" of card CardNameput bg field "Att" into bg field "Attenuator" of card CardNamego to card CardNameput Empty into bg field "Station"select text of bg field "Station"end ifelseput bg field "Mode" into bg field "Mode" of card CardNameput bg field "Filter" into bg field "Bandwidth" of card CardNameput bg field "Dial" into bg field "kHz" of card CardNameput bg field "AGC" into bg field "AGC" of card CardNameput bg field "Att" into bg field "Attenuator" of card CardNamego to card CardNameput Empty into bg field "Station"select text of bg field "Station"end ifend ifend mouseUp</script>
  638.     </part>
  639.     <part>
  640.         <id>45</id>
  641.         <type>button</type>
  642.         <visible> <true /> </visible>
  643.         <reserved5> 0 </reserved5>
  644.         <reserved4> 0 </reserved4>
  645.         <reserved3> 0 </reserved3>
  646.         <reserved2> 0 </reserved2>
  647.         <reserved1> 0 </reserved1>
  648.         <enabled> <true /> </enabled>
  649.         <rect>
  650.             <left>302</left>
  651.             <top>212</top>
  652.             <right>342</right>
  653.             <bottom>246</bottom>
  654.         </rect>
  655.         <style>transparent</style>
  656.         <showName> <false /> </showName>
  657.         <highlight> <false /> </highlight>
  658.         <autoHighlight> <true /> </autoHighlight>
  659.         <sharedHighlight> <true /> </sharedHighlight>
  660.         <family>0</family>
  661.         <titleWidth>0</titleWidth>
  662.         <icon>6871</icon>
  663.         <textAlign>center</textAlign>
  664.         <font>Chicago</font>
  665.         <textSize>12</textSize>
  666.         <textStyle>plain</textStyle>
  667.         <name>UP FAST</name>
  668.         <script>on mouseDownglobal step, onLineif onLine thenput empty into bg field "Mem Recall"wait 10put bg field "step" into stepput step into step1repeat while the mouse is downset numberFormat to "#####.00"add step1 to bg field "dial"end repeatelse exit mouseDownend mouseDownon mouseUpglobal step, onlineif online thenif bg field "dial" < 500 then put 1 into step1else put step into step1set numberFormat to "#####.00"add step1 to bg field "dial"sendFreq -- see stack script for detailselse exit mouseUpend mouseUp</script>
  669.     </part>
  670.     <part>
  671.         <id>46</id>
  672.         <type>button</type>
  673.         <visible> <true /> </visible>
  674.         <reserved5> 0 </reserved5>
  675.         <reserved4> 0 </reserved4>
  676.         <reserved3> 0 </reserved3>
  677.         <reserved2> 0 </reserved2>
  678.         <reserved1> 0 </reserved1>
  679.         <enabled> <true /> </enabled>
  680.         <rect>
  681.             <left>171</left>
  682.             <top>212</top>
  683.             <right>211</right>
  684.             <bottom>246</bottom>
  685.         </rect>
  686.         <style>transparent</style>
  687.         <showName> <false /> </showName>
  688.         <highlight> <false /> </highlight>
  689.         <autoHighlight> <true /> </autoHighlight>
  690.         <sharedHighlight> <true /> </sharedHighlight>
  691.         <family>0</family>
  692.         <titleWidth>0</titleWidth>
  693.         <icon>5910</icon>
  694.         <textAlign>center</textAlign>
  695.         <font>Chicago</font>
  696.         <textSize>12</textSize>
  697.         <textStyle>plain</textStyle>
  698.         <name>DOWN FAST</name>
  699.         <script>on mouseDownglobal step, onlineif online thenput empty into bg fld "Mem Recall"wait 10put bg field "step" into stepput step into step1repeat while the mouse is downset numberFormat to "#####.00"subtract step1 from bg field "dial"end repeatelse exit mouseDownend mouseDownon mouseUpglobal step, onLineif online thenif bg field "dial" < 500 then put 1 into step1else put step into step1set numberFormat to "#####.00"subtract step1 from bg field "dial"sendFreq -- see stack script for detailselse exit mouseUpend mouseUp</script>
  700.     </part>
  701.     <part>
  702.         <id>47</id>
  703.         <type>field</type>
  704.         <visible> <true /> </visible>
  705.         <dontWrap> <false /> </dontWrap>
  706.         <dontSearch> <false /> </dontSearch>
  707.         <sharedText> <false /> </sharedText>
  708.         <fixedLineHeight> <false /> </fixedLineHeight>
  709.         <autoTab> <false /> </autoTab>
  710.         <lockText> <true /> </lockText>
  711.         <rect>
  712.             <left>420</left>
  713.             <top>52</top>
  714.             <right>498</right>
  715.             <bottom>72</bottom>
  716.         </rect>
  717.         <style>transparent</style>
  718.         <autoSelect> <false /> </autoSelect>
  719.         <showLines> <false /> </showLines>
  720.         <wideMargins> <false /> </wideMargins>
  721.         <multipleLines> <false /> </multipleLines>
  722.         <reservedFamily> 0 </reservedFamily>
  723.         <titleWidth>0</titleWidth>
  724.         <icon>0</icon>
  725.         <textAlign>right</textAlign>
  726.         <font>Geneva</font>
  727.         <textSize>9</textSize>
  728.         <textStyle>outline</textStyle>
  729.         <textStyle>bold</textStyle>
  730.         <textHeight>12</textHeight>
  731.         <name>UTC Time</name>
  732.         <script></script>
  733.     </part>
  734.     <part>
  735.         <id>48</id>
  736.         <type>field</type>
  737.         <visible> <true /> </visible>
  738.         <dontWrap> <false /> </dontWrap>
  739.         <dontSearch> <false /> </dontSearch>
  740.         <sharedText> <false /> </sharedText>
  741.         <fixedLineHeight> <false /> </fixedLineHeight>
  742.         <autoTab> <false /> </autoTab>
  743.         <lockText> <true /> </lockText>
  744.         <rect>
  745.             <left>362</left>
  746.             <top>40</top>
  747.             <right>497</right>
  748.             <bottom>60</bottom>
  749.         </rect>
  750.         <style>transparent</style>
  751.         <autoSelect> <false /> </autoSelect>
  752.         <showLines> <false /> </showLines>
  753.         <wideMargins> <false /> </wideMargins>
  754.         <multipleLines> <false /> </multipleLines>
  755.         <reservedFamily> 0 </reservedFamily>
  756.         <titleWidth>0</titleWidth>
  757.         <icon>0</icon>
  758.         <textAlign>right</textAlign>
  759.         <font>Geneva</font>
  760.         <textSize>9</textSize>
  761.         <textStyle>outline</textStyle>
  762.         <textStyle>bold</textStyle>
  763.         <textHeight>12</textHeight>
  764.         <name>UTC Date</name>
  765.         <script></script>
  766.     </part>
  767.     <part>
  768.         <id>49</id>
  769.         <type>field</type>
  770.         <visible> <true /> </visible>
  771.         <dontWrap> <false /> </dontWrap>
  772.         <dontSearch> <false /> </dontSearch>
  773.         <sharedText> <false /> </sharedText>
  774.         <fixedLineHeight> <false /> </fixedLineHeight>
  775.         <autoTab> <false /> </autoTab>
  776.         <lockText> <false /> </lockText>
  777.         <rect>
  778.             <left>426</left>
  779.             <top>70</top>
  780.             <right>457</right>
  781.             <bottom>88</bottom>
  782.         </rect>
  783.         <style>transparent</style>
  784.         <autoSelect> <false /> </autoSelect>
  785.         <showLines> <false /> </showLines>
  786.         <wideMargins> <false /> </wideMargins>
  787.         <multipleLines> <false /> </multipleLines>
  788.         <reservedFamily> 0 </reservedFamily>
  789.         <titleWidth>0</titleWidth>
  790.         <icon>0</icon>
  791.         <textAlign>left</textAlign>
  792.         <font>Geneva</font>
  793.         <textSize>12</textSize>
  794.         <textStyle>outline</textStyle>
  795.         <textStyle>bold</textStyle>
  796.         <textHeight>16</textHeight>
  797.         <name>Mem Recall</name>
  798.         <script></script>
  799.     </part>
  800.     <part>
  801.         <id>51</id>
  802.         <type>button</type>
  803.         <visible> <true /> </visible>
  804.         <reserved5> 0 </reserved5>
  805.         <reserved4> 0 </reserved4>
  806.         <reserved3> 0 </reserved3>
  807.         <reserved2> 0 </reserved2>
  808.         <reserved1> 0 </reserved1>
  809.         <enabled> <true /> </enabled>
  810.         <rect>
  811.             <left>406</left>
  812.             <top>302</top>
  813.             <right>451</right>
  814.             <bottom>342</bottom>
  815.         </rect>
  816.         <style>transparent</style>
  817.         <showName> <false /> </showName>
  818.         <highlight> <false /> </highlight>
  819.         <autoHighlight> <true /> </autoHighlight>
  820.         <sharedHighlight> <true /> </sharedHighlight>
  821.         <family>0</family>
  822.         <titleWidth>0</titleWidth>
  823.         <icon>1020</icon>
  824.         <textAlign>center</textAlign>
  825.         <font>Chicago</font>
  826.         <textSize>12</textSize>
  827.         <textStyle>plain</textStyle>
  828.         <name>Help</name>
  829.         <script>on mouseDownget the rect of bg btn "Help"put item 1 of it + item 1 of loc of card window +8 into horizput item 4 of it + item 2 of loc of card window -260 into vert-- put the right of me +68 into horiz-- put the top of me -50 into vertput "General Help,Keypad,Ch# Button,Channel Selection,Arrow Buttons,Tuning Dial,Edit Channel Button,VFO to MEM Button" &┬¼",Control ON-OFF,Channel Info Window,Instant Channel,Sort By Station,Find,Station List,Scanning" &┬¼",Saving Databases,Printing Reports,Mac525 Menu"into myChoicesget PopUpMenu (myChoices,0,vert,horiz)if it is 0 thenexit mouseDownelseput item it of myChoices into helpCardvisual effect iris close fastgo to card helpCardend ifend mouseDown</script>
  830.     </part>
  831.     <part>
  832.         <id>52</id>
  833.         <type>button</type>
  834.         <visible> <false /> </visible>
  835.         <reserved5> 0 </reserved5>
  836.         <reserved4> 0 </reserved4>
  837.         <reserved3> 0 </reserved3>
  838.         <reserved2> 0 </reserved2>
  839.         <reserved1> 0 </reserved1>
  840.         <enabled> <true /> </enabled>
  841.         <rect>
  842.             <left>127</left>
  843.             <top>298</top>
  844.             <right>247</right>
  845.             <bottom>320</bottom>
  846.         </rect>
  847.         <style>rectangle</style>
  848.         <showName> <true /> </showName>
  849.         <highlight> <false /> </highlight>
  850.         <autoHighlight> <false /> </autoHighlight>
  851.         <sharedHighlight> <true /> </sharedHighlight>
  852.         <family>0</family>
  853.         <titleWidth>0</titleWidth>
  854.         <icon>0</icon>
  855.         <textAlign>center</textAlign>
  856.         <font>Chicago</font>
  857.         <textSize>12</textSize>
  858.         <textStyle>plain</textStyle>
  859.         <name>Following 525</name>
  860.         <script>on mouseUpglobal commanding, onLineif commanding thenset the name of me to "Following 525"put false into commandingif onLIne thensendSPort "H0"sendSPort "I1"end ifelseset the name of me to "Commanding 525"put true into commandingif onLine thensendSPort "I0"sendSPort "H1"end ifend ifend mouseUp</script>
  861.     </part>
  862.     <part>
  863.         <id>54</id>
  864.         <type>field</type>
  865.         <visible> <true /> </visible>
  866.         <dontWrap> <false /> </dontWrap>
  867.         <dontSearch> <false /> </dontSearch>
  868.         <sharedText> <false /> </sharedText>
  869.         <fixedLineHeight> <false /> </fixedLineHeight>
  870.         <autoTab> <false /> </autoTab>
  871.         <lockText> <true /> </lockText>
  872.         <rect>
  873.             <left>11</left>
  874.             <top>163</top>
  875.             <right>148</right>
  876.             <bottom>180</bottom>
  877.         </rect>
  878.         <style>transparent</style>
  879.         <autoSelect> <false /> </autoSelect>
  880.         <showLines> <false /> </showLines>
  881.         <wideMargins> <false /> </wideMargins>
  882.         <multipleLines> <false /> </multipleLines>
  883.         <reservedFamily> 0 </reservedFamily>
  884.         <titleWidth>0</titleWidth>
  885.         <icon>0</icon>
  886.         <textAlign>center</textAlign>
  887.         <font>Geneva</font>
  888.         <textSize>9</textSize>
  889.         <textStyle>outline</textStyle>
  890.         <textHeight>12</textHeight>
  891.         <name>Channel Information</name>
  892.         <script></script>
  893.     </part>
  894.     <part>
  895.         <id>30</id>
  896.         <type>field</type>
  897.         <visible> <true /> </visible>
  898.         <dontWrap> <false /> </dontWrap>
  899.         <dontSearch> <false /> </dontSearch>
  900.         <sharedText> <false /> </sharedText>
  901.         <fixedLineHeight> <false /> </fixedLineHeight>
  902.         <autoTab> <false /> </autoTab>
  903.         <lockText> <true /> </lockText>
  904.         <rect>
  905.             <left>11</left>
  906.             <top>176</top>
  907.             <right>148</right>
  908.             <bottom>252</bottom>
  909.         </rect>
  910.         <style>transparent</style>
  911.         <autoSelect> <false /> </autoSelect>
  912.         <showLines> <false /> </showLines>
  913.         <wideMargins> <false /> </wideMargins>
  914.         <multipleLines> <false /> </multipleLines>
  915.         <reservedFamily> 0 </reservedFamily>
  916.         <titleWidth>0</titleWidth>
  917.         <icon>0</icon>
  918.         <textAlign>left</textAlign>
  919.         <font>Geneva</font>
  920.         <textSize>12</textSize>
  921.         <textStyle>outline</textStyle>
  922.         <textHeight>16</textHeight>
  923.         <name>Channel Data</name>
  924.         <script>on mouseUpget the style of meif it is transparent then-- put empty into bg field "channel information"set lockscreen to trueset style of me to scrollingset textStyle of me to plainset the rect of me to 5,159,173,259-- set lockText of me to falseset lockscreen to falseend ifif it is scrolling thenset lockscreen to trueset the style of me to transparentset the textStyle of me to outlineset lockText of me to trueset the rect of me to 11,176,148,252-- put "Channel Information" into bg field "Channel Information"set lockscreen to falseend ifplay clickend mouseUp</script>
  925.     </part>
  926.     <part>
  927.         <id>55</id>
  928.         <type>button</type>
  929.         <visible> <true /> </visible>
  930.         <reserved5> 0 </reserved5>
  931.         <reserved4> 0 </reserved4>
  932.         <reserved3> 0 </reserved3>
  933.         <reserved2> 0 </reserved2>
  934.         <reserved1> 0 </reserved1>
  935.         <enabled> <true /> </enabled>
  936.         <rect>
  937.             <left>278</left>
  938.             <top>299</top>
  939.             <right>349</right>
  940.             <bottom>342</bottom>
  941.         </rect>
  942.         <style>rectangle</style>
  943.         <showName> <true /> </showName>
  944.         <highlight> <true /> </highlight>
  945.         <autoHighlight> <true /> </autoHighlight>
  946.         <sharedHighlight> <true /> </sharedHighlight>
  947.         <family>0</family>
  948.         <titleWidth>0</titleWidth>
  949.         <icon>10181</icon>
  950.         <textAlign>center</textAlign>
  951.         <font>Chicago</font>
  952.         <textSize>12</textSize>
  953.         <textStyle>plain</textStyle>
  954.         <name>By Station</name>
  955.         <script>on mouseUpset highlite of me to trueanswer "Sort channels by station name?" with "Cancel" or "Sort"if it is "Sort" then-- first, change all "Empty" "stations" into "ZZZ" to assure they're lastset cursor to busyshow window "Message"lock screenput "Preparing for sort..." into msggo to first card of background "Channel Data"repeat with cdNum = 1 to 200-- put bg fld "Channel #" into msgset cursor to busyif bg fld "Station" is "Empty" then put "ZZZ" into bg fld "Station"go to next cardend repeat-- sort all cards of background "Channel Data" by "Station"put "Sorting by frequency..." into msgset cursor to busysort background "Channel Data" ascending numeric by fld "kHz"put "Sorting by station..." into msgset cursor to busysort background "Channel Data" ascending text by fld "Station"-- renumber cards and channels & replace all "ZZZ" stations back to "Empty"put "Cleaning up..." into msggo to first card of background "Channel Data"repeat with cdNum = 0 to 199set cursor to busyset numberFormat to "000"put cdNum + 0 into theChanput "Channel" & theChan into theName-- put "Channel " & bg fld "Channel #" & " now " & TheChan into msgset the name of this card to theNameput TheChan into bg fld "Channel #"if bg fld "Station" is "ZZZ" then put "Empty" into bg fld "Station"go to next cardend repeatput "Done" into msggo to card "Main Control Panel"unlock screenhide window "Message"end ifend mouseUp</script>
  956.     </part>
  957.     <part>
  958.         <id>56</id>
  959.         <type>button</type>
  960.         <visible> <true /> </visible>
  961.         <reserved5> 0 </reserved5>
  962.         <reserved4> 0 </reserved4>
  963.         <reserved3> 0 </reserved3>
  964.         <reserved2> 0 </reserved2>
  965.         <reserved1> 0 </reserved1>
  966.         <enabled> <true /> </enabled>
  967.         <rect>
  968.             <left>352</left>
  969.             <top>302</top>
  970.             <right>396</right>
  971.             <bottom>342</bottom>
  972.         </rect>
  973.         <style>rectangle</style>
  974.         <showName> <false /> </showName>
  975.         <highlight> <true /> </highlight>
  976.         <autoHighlight> <true /> </autoHighlight>
  977.         <sharedHighlight> <true /> </sharedHighlight>
  978.         <family>0</family>
  979.         <titleWidth>-1</titleWidth>
  980.         <icon>-15953</icon>
  981.         <textAlign>center</textAlign>
  982.         <font>Chicago</font>
  983.         <textSize>12</textSize>
  984.         <textStyle>plain</textStyle>
  985.         <name>Find Station</name>
  986.         <script>on mouseDownglobal stationListget the visible of cd field "Find List"if it is true thenhide cd field "Find List"exit mouseDownelseif the optionKey is down thendoMenu "Edit Station List"exit mouseDownelseshow cd field "Find List"set the scroll of cd field "Find List" to 0-- wait for the field to send 'fieldChosen' messageend ifend if -- wait for the field to send 'fieldChosen' messageend mousedownon mouseUpset the highlight of me to trueend mouseUpon fieldChosenselect the clickLineput the clickText into theStnhide cd field "Find List"set the highlight of me to trueif theStn is empty then exit fieldChosenif theStn is "CANCEL FIND OPERATION" then exit fieldChosenlock screenpush cardfind theStn in bg fld "Station"if the result is not empty thenbeeppop cardexit fieldChosenend ifput "Channel" & bg fld "Channel #" into cardNameput bg fld "Channel #" into channelTemppop cardunlock screenset the name of card button id 32 to channelTempset numberFormat to "000"put channelTemp * 1 into bg field "channel"set numberFormat to "####0.00""put (bg field "kHz" of card cardName) + 0 into bg field "dial"put bg field "Mode" of card cardName into bg field "mode"put bg field "AGC" of card cardName into bg field "AGC"put bg field "Bandwidth" of card cardName into bg field "filter"put bg field "attenuator" of card cardName into bg field "att"put empty into channelDataput bg field "station" of cd cardName into channelDataStationput bg field "remarks" of cd cardName into channelDataRemarksput channelDataStation & return & channelDataRemarks into bg field "Channel Data"put false into Manual-- GET LOCATION OF SLIDING CHANNEL SELECT BUTTONput bg field "channel" into channelTempmultiply channelTemp by 1.825add 95 to channelTempset numberFormat to "0"divide channelTemp by 1put channelTemp & ",276" into theLocset the loc of cd btn id 32 to (theLoc)set highlite of me to true-- UPDATE LOCATION OF SLIDING CHANNEL SELECT BUTTONput bg field "channel" into channelTempmultiply channelTemp by 1.825add 95 to channelTempset numberFormat to "0"divide channelTemp by 1put channelTemp & ",276" into theLocset the loc of cd btn id 32 to (theLoc)set highlite of me to trueend fieldChosen</script>
  987.     </part>
  988.     <part>
  989.         <id>57</id>
  990.         <type>button</type>
  991.         <visible> <true /> </visible>
  992.         <reserved5> 0 </reserved5>
  993.         <reserved4> 0 </reserved4>
  994.         <reserved3> 0 </reserved3>
  995.         <reserved2> 0 </reserved2>
  996.         <reserved1> 0 </reserved1>
  997.         <enabled> <true /> </enabled>
  998.         <rect>
  999.             <left>44</left>
  1000.             <top>263</top>
  1001.             <right>68</right>
  1002.             <bottom>289</bottom>
  1003.         </rect>
  1004.         <style>transparent</style>
  1005.         <showName> <false /> </showName>
  1006.         <highlight> <false /> </highlight>
  1007.         <autoHighlight> <true /> </autoHighlight>
  1008.         <sharedHighlight> <true /> </sharedHighlight>
  1009.         <family>0</family>
  1010.         <titleWidth>0</titleWidth>
  1011.         <icon>8349</icon>
  1012.         <textAlign>center</textAlign>
  1013.         <font>Chicago</font>
  1014.         <textSize>12</textSize>
  1015.         <textStyle>plain</textStyle>
  1016.         <name>PrevChan</name>
  1017.         <script>on mouseDownrepeat           -- be sure we execute this at least once per clickput bg fld "channel" into channelTempset numberFormat to "000"subtract 1 from channelTempput "Channel" & channelTemp into cardNameif channeltemp < 0 thenexit mouseDownend ifset the name of card button id 32 to channelTempset numberFormat to "000"put channelTemp * 1 into bg field "channel"set numberFormat to "####0.00"if bg fld "Station" of cd cardName is not "Empty" thenif icon of bg btn id 59 is "5029" thenput (bg field "kHz" of card cardName) + 0 into bg field "dial"put bg field "Mode" of card cardName into bg field "mode"put bg field "AGC" of card cardName into bg field "AGC"put bg field "Bandwidth" of card cardName into bg field "filter"put bg field "attenuator" of card cardName into bg field "att"end ifput empty into channelDataput bg field "kHz" of cd cardName into channelDataKHzput bg field "station" of cd cardName into channelDataStationput bg field "remarks" of cd cardName into channelDataRemarksput channelDataKHz && "kHz" & return & channelDataStation & return & channelDataRemarks into bg field"Channel Data"put "MR" into bg field "Mem Recall"end ifif bg fld "Station" of cd cardName is  "Empty" thenput " " & return & "Empty" into bg field "Channel Data"end ifif bg fld "Station" of cd cardName is not "Empty" and icon ┬¼of bg btn id 59 is "5029" then-- send mouseUp to cd button "Channel Set"sendFreqdoAGCdoModedoATTdoBWend ifif the mouse is up then exit repeatend repeat-- SET LOCATION OF SLIDING CHANNEL SELECT BUTTONput bg field "channel" into channelTempmultiply channelTemp by 1.825add 95 to channelTempset numberFormat to "0"divide channelTemp by 1put channelTemp & ",276" into theLocset the loc of cd btn id 32 to (theLoc)end mouseDown</script>
  1018.     </part>
  1019.     <part>
  1020.         <id>59</id>
  1021.         <type>button</type>
  1022.         <visible> <true /> </visible>
  1023.         <reserved5> 0 </reserved5>
  1024.         <reserved4> 0 </reserved4>
  1025.         <reserved3> 0 </reserved3>
  1026.         <reserved2> 0 </reserved2>
  1027.         <reserved1> 0 </reserved1>
  1028.         <enabled> <true /> </enabled>
  1029.         <rect>
  1030.             <left>201</left>
  1031.             <top>299</top>
  1032.             <right>276</right>
  1033.             <bottom>342</bottom>
  1034.         </rect>
  1035.         <style>transparent</style>
  1036.         <showName> <true /> </showName>
  1037.         <highlight> <true /> </highlight>
  1038.         <autoHighlight> <false /> </autoHighlight>
  1039.         <sharedHighlight> <true /> </sharedHighlight>
  1040.         <family>0</family>
  1041.         <titleWidth>0</titleWidth>
  1042.         <icon>5028</icon>
  1043.         <textAlign>center</textAlign>
  1044.         <font>Chicago</font>
  1045.         <textSize>12</textSize>
  1046.         <textStyle>plain</textStyle>
  1047.         <name>Instant Channel</name>
  1048.         <script>on mouseUpget the icon of Meif It is "5028" then -- OFFset icon of me to "5029" -- TURN ONput true into instantChannelclick at the loc of bg button "CHANNEL SET"elseset icon of me to "5028" -- TURN OFFput false into instantChannelend ifplay clickend mouseUp</script>
  1049.     </part>
  1050.     <part>
  1051.         <id>60</id>
  1052.         <type>button</type>
  1053.         <visible> <true /> </visible>
  1054.         <reserved5> 0 </reserved5>
  1055.         <reserved4> 0 </reserved4>
  1056.         <reserved3> 0 </reserved3>
  1057.         <reserved2> 0 </reserved2>
  1058.         <reserved1> 0 </reserved1>
  1059.         <enabled> <true /> </enabled>
  1060.         <rect>
  1061.             <left>2</left>
  1062.             <top>299</top>
  1063.             <right>58</right>
  1064.             <bottom>342</bottom>
  1065.         </rect>
  1066.         <style>transparent</style>
  1067.         <showName> <true /> </showName>
  1068.         <highlight> <true /> </highlight>
  1069.         <autoHighlight> <false /> </autoHighlight>
  1070.         <sharedHighlight> <true /> </sharedHighlight>
  1071.         <family>0</family>
  1072.         <titleWidth>0</titleWidth>
  1073.         <icon>5028</icon>
  1074.         <textAlign>center</textAlign>
  1075.         <font>Chicago</font>
  1076.         <textSize>12</textSize>
  1077.         <textStyle>plain</textStyle>
  1078.         <name>Control OFF</name>
  1079.         <script>on mouseUpglobal  onLine, commandingget the name of Meif It is "bkgnd button " & quote & "Control OFF" & quote then-- -if commanding thensendSPort "H1"-- else-- sendSPort "I1"-- end ifshow bg field "Remote" of cd "Main Control Panel"set icon of me to "receiverControl ON"play clickset name of me to "Control ON"put true into onLineput true into commanding-- send mouseUp to bg button id 61 of cd "Main Control Panel"  -- hidden button-- show bg button id 61 of cd "Main Control Panel"else-- if commanding thensendSPort "H0"-- else-- sendSPort "I0"-- end ifset icon of me to "receiverControl OFF"play clickset name of me to "Control OFF"hide bg field "Remote"hide bg button id 61put false into onLineput false into commandingend ifend mouseUp</script>
  1080.     </part>
  1081.     <part>
  1082.         <id>61</id>
  1083.         <type>button</type>
  1084.         <visible> <false /> </visible>
  1085.         <reserved5> 0 </reserved5>
  1086.         <reserved4> 0 </reserved4>
  1087.         <reserved3> 0 </reserved3>
  1088.         <reserved2> 0 </reserved2>
  1089.         <reserved1> 0 </reserved1>
  1090.         <enabled> <true /> </enabled>
  1091.         <rect>
  1092.             <left>2</left>
  1093.             <top>0</top>
  1094.             <right>120</right>
  1095.             <bottom>17</bottom>
  1096.         </rect>
  1097.         <style>opaque</style>
  1098.         <showName> <true /> </showName>
  1099.         <highlight> <false /> </highlight>
  1100.         <autoHighlight> <false /> </autoHighlight>
  1101.         <sharedHighlight> <true /> </sharedHighlight>
  1102.         <family>0</family>
  1103.         <titleWidth>0</titleWidth>
  1104.         <icon>0</icon>
  1105.         <textAlign>center</textAlign>
  1106.         <font>Chicago</font>
  1107.         <textSize>12</textSize>
  1108.         <textStyle>plain</textStyle>
  1109.         <name>Commanding 525</name>
  1110.         <script>on mouseUpglobal commanding, onLineif commanding thenset the name of me to "Following 525"put false into commandingif onLIne thensendSPort "H0"sendSPort "I1"end ifelseset the name of me to "Commanding 525"put true into commandingif onLine thensendSPort "I0"sendSPort "H1"end ifend ifend mouseUp</script>
  1111.     </part>
  1112.     <part>
  1113.         <id>62</id>
  1114.         <type>button</type>
  1115.         <visible> <true /> </visible>
  1116.         <reserved5> 0 </reserved5>
  1117.         <reserved4> 0 </reserved4>
  1118.         <reserved3> 0 </reserved3>
  1119.         <reserved2> 0 </reserved2>
  1120.         <reserved1> 0 </reserved1>
  1121.         <enabled> <true /> </enabled>
  1122.         <rect>
  1123.             <left>7</left>
  1124.             <top>263</top>
  1125.             <right>39</right>
  1126.             <bottom>290</bottom>
  1127.         </rect>
  1128.         <style>transparent</style>
  1129.         <showName> <false /> </showName>
  1130.         <highlight> <false /> </highlight>
  1131.         <autoHighlight> <true /> </autoHighlight>
  1132.         <sharedHighlight> <true /> </sharedHighlight>
  1133.         <family>0</family>
  1134.         <titleWidth>0</titleWidth>
  1135.         <icon>0</icon>
  1136.         <textAlign>center</textAlign>
  1137.         <font>Chicago</font>
  1138.         <textSize>12</textSize>
  1139.         <textStyle>plain</textStyle>
  1140.         <name>Channel Set</name>
  1141.         <script>on mouseUpglobal channelTempput bg field "Channel" into channelTempif bg fld "Station" of cd "channel" & (channelTemp) is not "Empty" thenput bg field "Mode" of card "channel" & (channelTemp) into bg field "mode"put bg field "AGC" of card "channel" & (channelTemp) into bg field "AGC"put bg field "Bandwidth" of card "channel" & (channelTemp) into bg field "filter"put bg field "attenuator" of card "channel" & (channelTemp) into bg field "att"-- send mouseUp to cd button "Channel Set"set numberFormat to "####0.00"put (bg field "kHz" of card "channel" & (channelTemp)) + 0 into dialtempmultiply dialTemp by 1put dialTemp into bg field "dial"sendFreqdoAGCdoModedoATTdoBWput "MR" into bg field "Mem Recall"end ifif bg fld "Station" of cd "channel" & (channelTemp) is  "Empty" thenbeepend ifend mouseUp</script>
  1142.     </part>
  1143.     <name>Mac525 Control Panel</name>
  1144.     <script></script>
  1145. </background>
  1146.